home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 43
/
Aminet 43 (2001)(GTI - Schatztruhe)[!][Jun 2001].iso
/
Aminet
/
game
/
actio
/
PaybackDemoUp3.lha
/
PaybackDemoUpdate3
/
UpdatePbackDemo-Slovak
< prev
next >
Wrap
Text File
|
2001-03-21
|
1KB
|
47 lines
; $VER: PaybackDemo Update Version 1.2 (23 February 2001)
; © James Daniels/Apex Designs
(set #installdrawer (cat "Prosím vyber adresár, kde je nainîtalovaná hratelná demoverzia Paybacku."))
(set #installdrawer-help (cat "Vyber adresár, ktorý obsahuje hratelnú demoverziu Paybacku a ktorú si ùeláî zmodernizovaï."))
(set #notfound (cat "\nTento adresár neobsahuje správne nainîtalovanú demoverziu Paybacku.\nProsím vyber iný adresár."))
(set #install-all (cat "Modernizujem súbory..."))
(set #finished-message (cat "\nTvoja kópia demoverzie Paybacku bola úspeîne zmodernizovaná."))
(set destdir "RAM:")
(while (= (exists (tackon destdir "PaybackDemo.exe")) 0)
(
(set destdir
(askdir
(prompt #installdrawer)
(help #installdrawer-help)
(default "RAM:")
(disk)
)
)
(if (= (exists (tackon destdir "PaybackDemo.exe")) 0)
(message #notfound)
)
)
)
(complete 10)
(copyfiles
(prompt #install-all)
(source "Files/")
(pattern "#?")
(dest destdir)
)
(complete 100)
(message #finished-message)
(set @default-dest destdir)